perm filename LUU[AM,DBL] blob sn#194182 filedate 1975-12-31 generic text, type T, neo UTF8
(FILECREATED "29-DEC-75 15:31:05" <LENAT>LUU.;1 1793   )


  (LISPXPRINT (QUOTE LUUCOMS)
	      T T)
  [RPAQQ LUUCOMS ((P (STORAGE T)
		     (SETQ MKSWAPSIZE 32)
		     (PRIN1 "Garbage collecting:")
		     (MINFS 11000 1)
		     (RECLAIM 1)
		     (MINFS 512 1)
		     (MINFS 65000)
		     (RECLAIM)
		     (MINFS 17000)
		     (MINFS 7000 12)
		     (RECLAIM 12)
		     (MINFS 512 12)
		     (MINFS 3000 18)
		     (RECLAIM 18)
		     (MINFS 1000 18)
		     (MINFS 10000 28)
		     (RECLAIM 28)
		     (MINFS 512 28)
		     (TERPRI)
		     (STORAGE T)
		     (TERPRI)
		     (PRIN1 "Loading in TOP6.COM")
		     (TERPRI)
		     (PRINT (LOAD (QUOTE TOP6.COM)))
		     (TERPRI)
		     (STORAGE T)
		     (TERPRI)
		     (PRIN1 "Loading in CON6")
		     (TERPRI)
		     (PRINT (LOAD (QUOTE CON6)))
		     (TERPRI)
		     (STORAGE T)
		     (TERPRI)
		     (PRIN1 "Loading in UTIL6")
		     (TERPRI)
		     (PRINT (LOAD (QUOTE UTIL6.COM)))
		     (TERPRI)
		     (STORAGE T)
		     (LENGTH GLOBALVARS]
  (STORAGE T)
  (SETQ MKSWAPSIZE 32)
  (PRIN1 "Garbage collecting:")
  (MINFS 11000 1)
  (RECLAIM 1)
  (MINFS 512 1)
  (MINFS 65000)
  (RECLAIM)
  (MINFS 17000)
  (MINFS 7000 12)
  (RECLAIM 12)
  (MINFS 512 12)
  (MINFS 3000 18)
  (RECLAIM 18)
  (MINFS 1000 18)
  (MINFS 10000 28)
  (RECLAIM 28)
  (MINFS 512 28)
  (TERPRI)
  (STORAGE T)
  (TERPRI)
  (PRIN1 "Loading in TOP6.COM")
  (TERPRI)
  (PRINT (LOAD (QUOTE TOP6.COM)))
  (TERPRI)
  (STORAGE T)
  (TERPRI)
  (PRIN1 "Loading in CON6")
  (TERPRI)
  (PRINT (LOAD (QUOTE CON6)))
  (TERPRI)
  (STORAGE T)
  (TERPRI)
  (PRIN1 "Loading in UTIL6")
  (TERPRI)
  (PRINT (LOAD (QUOTE UTIL6.COM)))
  (TERPRI)
  (STORAGE T)
  (LENGTH GLOBALVARS)
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP